home *** CD-ROM | disk | FTP | other *** search
/ QuickTime 2.0 Developer Kit / QuickTime 2.0 Developer Kit.iso / mac / MAC / Programming Stuff / Interfaces / PInterfaces / ImageCompression.p < prev    next >
Encoding:
Text File  |  1994-11-11  |  33.3 KB  |  846 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        ImageCompression.p
  3.  
  4.      Copyright:    © 1984-1994 by Apple Computer, Inc.
  5.                  All rights reserved.
  6.  
  7.      Version:    Universal Interfaces 2.0a3  ETO #16, MPW prerelease.  Friday, November 11, 1994. 
  8.  
  9.      Bugs?:        If you find a problem with this file, send the file and version
  10.                  information (from above) and the problem description to:
  11.  
  12.                      Internet:    apple.bugs@applelink.apple.com
  13.                      AppleLink:    APPLE.BUGS
  14.  
  15. }
  16.  
  17. {$IFC UNDEFINED UsingIncludes}
  18. {$SETC UsingIncludes := 0}
  19. {$ENDC}
  20.  
  21. {$IFC NOT UsingIncludes}
  22.  UNIT ImageCompression;
  23.  INTERFACE
  24. {$ENDC}
  25.  
  26. {$IFC UNDEFINED __IMAGECOMPRESSION__}
  27. {$SETC __IMAGECOMPRESSION__ := 1}
  28.  
  29. {$I+}
  30. {$SETC ImageCompressionIncludes := UsingIncludes}
  31. {$SETC UsingIncludes := 1}
  32.  
  33.  
  34. {$IFC UNDEFINED __TYPES__}
  35. {$I Types.p}
  36. {$ENDC}
  37. {    ConditionalMacros.p                                            }
  38.  
  39. {$IFC UNDEFINED __QUICKDRAW__}
  40. {$I Quickdraw.p}
  41. {$ENDC}
  42. {    MixedMode.p                                                    }
  43. {    QuickdrawText.p                                                }
  44.  
  45. {$IFC UNDEFINED __QDOFFSCREEN__}
  46. {$I QDOffscreen.p}
  47. {$ENDC}
  48. {    Errors.p                                                    }
  49.  
  50. {$IFC UNDEFINED __COMPONENTS__}
  51. {$I Components.p}
  52. {$ENDC}
  53.  
  54. {$IFC UNDEFINED __WINDOWS__}
  55. {$I Windows.p}
  56. {$ENDC}
  57. {    Memory.p                                                    }
  58. {    Events.p                                                    }
  59. {        OSUtils.p                                                }
  60. {    Controls.p                                                    }
  61. {        Menus.p                                                    }
  62.  
  63. {$IFC UNDEFINED __STANDARDFILE__}
  64. {$I StandardFile.p}
  65. {$ENDC}
  66. {    Dialogs.p                                                    }
  67. {        TextEdit.p                                                }
  68. {    Files.p                                                        }
  69.  
  70. {$PUSH}
  71. {$ALIGN MAC68K}
  72. {$LibExport+}
  73.  
  74. TYPE
  75.     MatrixRecord = RECORD
  76.         matrix:                    ARRAY [0..2,0..2] OF Fixed;
  77.     END;
  78.     MatrixRecordPtr = ^MatrixRecord;
  79.  
  80.     FixedPoint = RECORD
  81.         x:                        Fixed;
  82.         y:                        Fixed;
  83.     END;
  84.     FixedRect = RECORD
  85.         left:                    Fixed;
  86.         top:                    Fixed;
  87.         right:                    Fixed;
  88.         bottom:                    Fixed;
  89.     END;
  90. { These are the bits that are set in the Component flags, and also in the codecInfo struct. }
  91.  
  92. CONST
  93.     codecInfoDoes1                = 0+(1 * (2**(0)));
  94.     codecInfoDoes2                = 0+(1 * (2**(1)));
  95.     codecInfoDoes4                = 0+(1 * (2**(2)));
  96.     codecInfoDoes8                = 0+(1 * (2**(3)));
  97.     codecInfoDoes16                = 0+(1 * (2**(4)));
  98.     codecInfoDoes32                = 0+(1 * (2**(5)));
  99.     codecInfoDoesDither            = 0+(1 * (2**(6)));
  100.     codecInfoDoesStretch        = 0+(1 * (2**(7)));
  101.     codecInfoDoesShrink            = 0+(1 * (2**(8)));
  102.     codecInfoDoesMask            = 0+(1 * (2**(9)));
  103.     codecInfoDoesTemporal        = 0+(1 * (2**(10)));
  104.     codecInfoDoesDouble            = 0+(1 * (2**(11)));
  105.     codecInfoDoesQuad            = 0+(1 * (2**(12)));
  106.     codecInfoDoesHalf            = 0+(1 * (2**(13)));
  107.     codecInfoDoesQuarter        = 0+(1 * (2**(14)));
  108.     codecInfoDoesRotate            = 0+(1 * (2**(15)));
  109.     codecInfoDoesHorizFlip        = 0+(1 * (2**(16)));
  110.     codecInfoDoesVertFlip        = 0+(1 * (2**(17)));
  111.     codecInfoDoesSkew            = 0+(1 * (2**(18)));
  112.     codecInfoDoesBlend            = 0+(1 * (2**(19)));
  113.     codecInfoDoesWarp            = 0+(1 * (2**(20)));
  114.     codecInfoDoesRecompress        = 0+(1 * (2**(21)));
  115.     codecInfoDoesSpool            = 0+(1 * (2**(22)));
  116.     codecInfoDoesRateConstrain    = 0+(1 * (2**(23)));
  117.  
  118.     codecInfoDepth1                = 0+(1 * (2**(0)));
  119.     codecInfoDepth2                = 0+(1 * (2**(1)));
  120.     codecInfoDepth4                = 0+(1 * (2**(2)));
  121.     codecInfoDepth8                = 0+(1 * (2**(3)));
  122.     codecInfoDepth16            = 0+(1 * (2**(4)));
  123.     codecInfoDepth32            = 0+(1 * (2**(5)));
  124.     codecInfoDepth24            = 0+(1 * (2**(6)));
  125.     codecInfoDepth33            = 0+(1 * (2**(7)));
  126.     codecInfoDepth34            = 0+(1 * (2**(8)));
  127.     codecInfoDepth36            = 0+(1 * (2**(9)));
  128.     codecInfoDepth40            = 0+(1 * (2**(10)));
  129.     codecInfoStoresClut            = 0+(1 * (2**(11)));
  130.     codecInfoDoesLossless        = 0+(1 * (2**(12)));
  131.     codecInfoSequenceSensitive    = 0+(1 * (2**(13)));
  132.  
  133.     codecFlagUseImageBuffer        = 0+(1 * (2**(0)));
  134.     codecFlagUseScreenBuffer    = 0+(1 * (2**(1)));
  135.     codecFlagUpdatePrevious        = 0+(1 * (2**(2)));
  136.     codecFlagNoScreenUpdate        = 0+(1 * (2**(3)));
  137.     codecFlagWasCompressed        = 0+(1 * (2**(4)));
  138.     codecFlagDontOffscreen        = 0+(1 * (2**(5)));
  139.     codecFlagUpdatePreviousComp    = 0+(1 * (2**(6)));
  140.     codecFlagForceKeyFrame        = 0+(1 * (2**(7)));
  141.     codecFlagOnlyScreenUpdate    = 0+(1 * (2**(8)));
  142.     codecFlagLiveGrab            = 0+(1 * (2**(9)));
  143.     codecFlagDontUseNewImageBuffer = 0+(1 * (2**(10)));
  144.     codecFlagInterlaceUpdate    = 0+(1 * (2**(11)));
  145.     codecFlagCatchUpDiff        = 0+(1 * (2**(12)));
  146.     codecFlagUsedNewImageBuffer    = 0+(1 * (2**(14)));
  147.     codecFlagUsedImageBuffer    = 0+(1 * (2**(15)));
  148.  
  149. { The minimum data size for spooling in or out data }
  150.     codecMinimumDataSize        = 32768;
  151.  
  152.     compressorComponentType        = 'imco';                        { the type for "Components" which compress images }
  153.     decompressorComponentType    = 'imdc';
  154.  
  155.     
  156. TYPE
  157.     CompressorComponent = Component;
  158.  
  159.     DecompressorComponent = Component;
  160.  
  161.     CodecComponent = Component;
  162.  
  163.  
  164. CONST
  165.     anyCodec                    = 0;                            { take first working codec of given type }
  166.     bestSpeedCodec                = -1;                            { take fastest codec of given type }
  167.     bestFidelityCodec            = -2;                            { take codec which is most accurate }
  168.     bestCompressionCodec        = -3;                            { take codec of given type that is most accurate }
  169.  
  170.     
  171. TYPE
  172.     CodecType = LONGINT;
  173.  
  174.     CodecFlags = INTEGER;
  175.  
  176.     CodecQ = LONGINT;
  177.  
  178.  
  179. CONST
  180.     codecLosslessQuality        = $400;
  181.     codecMaxQuality                = $3ff;
  182.     codecMinQuality                = $000;
  183.     codecLowQuality                = $100;
  184.     codecNormalQuality            = $200;
  185.     codecHighQuality            = $300;
  186.  
  187.     codecCompletionSource        = 0+(1 * (2**(0)));                { asynchronous codec is done with source data }
  188.     codecCompletionDest            = 0+(1 * (2**(1)));                { asynchronous codec is done with destination data }
  189.  
  190.     codecProgressOpen            = 0;
  191.     codecProgressUpdatePercent    = 1;
  192.     codecProgressClose            = 2;
  193.  
  194. TYPE
  195.     ICMDataProcPtr = ProcPtr;  { FUNCTION ICMData(VAR dataP: Ptr; bytesNeeded: LONGINT; refcon: LONGINT): OSErr; }
  196.     ICMFlushProcPtr = ProcPtr;  { FUNCTION ICMFlush(data: Ptr; bytesAdded: LONGINT; refcon: LONGINT): OSErr; }
  197.     ICMCompletionProcPtr = ProcPtr;  { PROCEDURE ICMCompletion(result: OSErr; flags: INTEGER; refcon: LONGINT); }
  198.     ICMProgressProcPtr = ProcPtr;  { FUNCTION ICMProgress(message: INTEGER; completeness: Fixed; refcon: LONGINT): OSErr; }
  199.     StdPixProcPtr = ProcPtr;  { PROCEDURE StdPix(VAR src: PixMap; VAR srcRect: Rect; VAR matrix: MatrixRecord; mode: INTEGER; mask: RgnHandle; VAR matte: PixMap; VAR matteRect: Rect; flags: INTEGER); }
  200.     ICMAlignmentProcPtr = ProcPtr;  { PROCEDURE ICMAlignment(VAR rp: Rect; refcon: LONGINT); }
  201.     ICMDataUPP = UniversalProcPtr;
  202.     ICMFlushUPP = UniversalProcPtr;
  203.     ICMCompletionUPP = UniversalProcPtr;
  204.     ICMProgressUPP = UniversalProcPtr;
  205.     StdPixUPP = UniversalProcPtr;
  206.     ICMAlignmentUPP = UniversalProcPtr;
  207.  
  208.     ImageSequence = LONGINT;
  209.  
  210.     ICMProgressProcRecord = RECORD
  211.         progressProc:            ICMProgressUPP;
  212.         progressRefCon:            LONGINT;
  213.     END;
  214.     ICMProgressProcRecordPtr = ^ICMProgressProcRecord;
  215.  
  216.     ICMCompletionProcRecord = RECORD
  217.         completionProc:            ICMCompletionUPP;
  218.         completionRefCon:        LONGINT;
  219.     END;
  220.     ICMCompletionProcRecordPtr = ^ICMCompletionProcRecord;
  221.  
  222.     ICMDataProcRecord = RECORD
  223.         dataProc:                ICMDataUPP;
  224.         dataRefCon:                LONGINT;
  225.     END;
  226.     ICMDataProcRecordPtr = ^ICMDataProcRecord;
  227.  
  228.     ICMFlushProcRecord = RECORD
  229.         flushProc:                ICMFlushUPP;
  230.         flushRefCon:            LONGINT;
  231.     END;
  232.     ICMFlushProcRecordPtr = ^ICMFlushProcRecord;
  233.  
  234.     ICMAlignmentProcRecord = RECORD
  235.         alignmentProc:            ICMAlignmentUPP;
  236.         alignmentRefCon:        LONGINT;
  237.     END;
  238.     ICMAlignmentProcRecordPtr = ^ICMAlignmentProcRecord;
  239.  
  240.     DataRateParams = RECORD
  241.         dataRate:                LONGINT;
  242.         dataOverrun:            LONGINT;
  243.         frameDuration:            LONGINT;
  244.         keyFrameRate:            LONGINT;
  245.         minSpatialQuality:        CodecQ;
  246.         minTemporalQuality:        CodecQ;
  247.     END;
  248.     DataRateParamsPtr = ^DataRateParams;
  249.  
  250.     ImageDescription = PACKED RECORD
  251.         idSize:                    LONGINT;                                { total size of ImageDescription including extra data ( CLUTs and other per sequence data }
  252.         cType:                    CodecType;                                { what kind of codec compressed this data }
  253.         resvd1:                    LONGINT;                                { reserved for Apple use }
  254.         resvd2:                    INTEGER;                                { reserved for Apple use }
  255.         dataRefIndex:            INTEGER;                                { set to zero  }
  256.         version:                INTEGER;                                { which version is this data }
  257.         revisionLevel:            INTEGER;                                { what version of that codec did this }
  258.         vendor:                    LONGINT;                                { whose  codec compressed this data }
  259.         temporalQuality:        CodecQ;                                    { what was the temporal quality factor  }
  260.         spatialQuality:            CodecQ;                                    { what was the spatial quality factor }
  261.         width:                    INTEGER;                                { how many pixels wide is this data }
  262.         height:                    INTEGER;                                { how many pixels high is this data }
  263.         hRes:                    Fixed;                                    { horizontal resolution }
  264.         vRes:                    Fixed;                                    { vertical resolution }
  265.         dataSize:                LONGINT;                                { if known, the size of data for this image descriptor }
  266.         frameCount:                INTEGER;                                { number of frames this description applies to }
  267.         name:                    Str31;                                    { name of codec ( in case not installed )  }
  268.         depth:                    INTEGER;                                { what depth is this data (1-32) or ( 33-40 grayscale ) }
  269.         clutID:                    INTEGER;                                { clut id or if 0 clut follows  or -1 if no clut }
  270.     END;
  271.     ImageDescriptionPtr = ^ImageDescription;
  272.     ImageDescriptionHandle = ^ImageDescriptionPtr;
  273.  
  274.     CodecInfo = PACKED RECORD
  275.         typeName:                Str31;                                    { name of the codec type i.e.: 'Apple Image Compression' }
  276.         version:                INTEGER;                                { version of the codec data that this codec knows about }
  277.         revisionLevel:            INTEGER;                                { revision level of this codec i.e: 0x00010001 (1.0.1) }
  278.         vendor:                    LONGINT;                                { Maker of this codec i.e: 'appl' }
  279.         decompressFlags:        LONGINT;                                { codecInfo flags for decompression capabilities }
  280.         compressFlags:            LONGINT;                                { codecInfo flags for compression capabilities }
  281.         formatFlags:            LONGINT;                                { codecInfo flags for compression format details }
  282.         compressionAccuracy:    UInt8;                                    { measure (1-255) of accuracy of this codec for compress (0 if unknown) }
  283.         decompressionAccuracy:    UInt8;                                    { measure (1-255) of accuracy of this codec for decompress (0 if unknown) }
  284.         compressionSpeed:        INTEGER;                                { ( millisecs for compressing 320x240 on base mac II) (0 if unknown)  }
  285.         decompressionSpeed:        INTEGER;                                { ( millisecs for decompressing 320x240 on mac II)(0 if unknown)  }
  286.         compressionLevel:        UInt8;                                    { measure (1-255) of compression level of this codec (0 if unknown)  }
  287.         resvd:                    UInt8;                                    { pad }
  288.         minimumHeight:            INTEGER;                                { minimum height of image (block size) }
  289.         minimumWidth:            INTEGER;                                { minimum width of image (block size) }
  290.         decompressPipelineLatency: INTEGER;                                { in milliseconds ( for asynchronous codecs ) }
  291.         compressPipelineLatency: INTEGER;                                { in milliseconds ( for asynchronous codecs ) }
  292.         privateData:            LONGINT;
  293.     END;
  294.     CodecNameSpec = RECORD
  295.         codec:                    CodecComponent;
  296.         cType:                    CodecType;
  297.         typeName:                Str31;
  298.         name:                    Handle;
  299.     END;
  300.     CodecNameSpecList = RECORD
  301.         count:                    INTEGER;
  302.         list:                    ARRAY [0..0] OF CodecNameSpec;
  303.     END;
  304.     CodecNameSpecListPtr = ^CodecNameSpecList;
  305.  
  306.  
  307. CONST
  308.     defaultDither                = 0;
  309.     forceDither                    = 1;
  310.     suppressDither                = 2;
  311.     useColorMatching            = 4;
  312.  
  313.  
  314. TYPE
  315.     ICMFrameTimeRecord = RECORD
  316.         value:                    wide;                                    { frame time}
  317.         scale:                    LONGINT;                                { timescale of value/duration fields}
  318.         base:                    Ptr;                                    { timebase}
  319.         duration:                LONGINT;                                { duration frame is to be displayed (0 if unknown)}
  320.         rate:                    Fixed;                                    { rate of timebase relative to wall-time}
  321.     END;
  322.     ICMFrameTimePtr = ^ICMFrameTimeRecord;
  323.  
  324.  
  325. CONST
  326.     uppICMDataProcInfo = $00000FE0; { FUNCTION (4 byte param, 4 byte param, 4 byte param): 2 byte result; }
  327.     uppICMFlushProcInfo = $00000FE0; { FUNCTION (4 byte param, 4 byte param, 4 byte param): 2 byte result; }
  328.     uppICMCompletionProcInfo = $00000E80; { PROCEDURE (2 byte param, 2 byte param, 4 byte param); }
  329.     uppICMProgressProcInfo = $00000FA0; { FUNCTION (2 byte param, 4 byte param, 4 byte param): 2 byte result; }
  330.     uppStdPixProcInfo = $002FEFC0; { PROCEDURE (4 byte param, 4 byte param, 4 byte param, 2 byte param, 4 byte param, 4 byte param, 4 byte param, 2 byte param); }
  331.     uppICMAlignmentProcInfo = $000003C0; { PROCEDURE (4 byte param, 4 byte param); }
  332.  
  333. FUNCTION NewICMDataProc(userRoutine: ICMDataProcPtr): ICMDataUPP;
  334.     {$IFC NOT GENERATINGCFM }
  335.     INLINE $2E9F;
  336.     {$ENDC}
  337.  
  338. FUNCTION NewICMFlushProc(userRoutine: ICMFlushProcPtr): ICMFlushUPP;
  339.     {$IFC NOT GENERATINGCFM }
  340.     INLINE $2E9F;
  341.     {$ENDC}
  342.  
  343. FUNCTION NewICMCompletionProc(userRoutine: ICMCompletionProcPtr): ICMCompletionUPP;
  344.     {$IFC NOT GENERATINGCFM }
  345.     INLINE $2E9F;
  346.     {$ENDC}
  347.  
  348. FUNCTION NewICMProgressProc(userRoutine: ICMProgressProcPtr): ICMProgressUPP;
  349.     {$IFC NOT GENERATINGCFM }
  350.     INLINE $2E9F;
  351.     {$ENDC}
  352.  
  353. FUNCTION NewStdPixProc(userRoutine: StdPixProcPtr): StdPixUPP;
  354.     {$IFC NOT GENERATINGCFM }
  355.     INLINE $2E9F;
  356.     {$ENDC}
  357.  
  358. FUNCTION NewICMAlignmentProc(userRoutine: ICMAlignmentProcPtr): ICMAlignmentUPP;
  359.     {$IFC NOT GENERATINGCFM }
  360.     INLINE $2E9F;
  361.     {$ENDC}
  362.  
  363. FUNCTION CallICMDataProc(VAR dataP: Ptr; bytesNeeded: LONGINT; refcon: LONGINT; userRoutine: ICMDataUPP): OSErr;
  364.     {$IFC NOT GENERATINGCFM}
  365.     INLINE $205F, $4E90;
  366.     {$ENDC}
  367.  
  368. FUNCTION CallICMFlushProc(data: Ptr; bytesAdded: LONGINT; refcon: LONGINT; userRoutine: ICMFlushUPP): OSErr;
  369.     {$IFC NOT GENERATINGCFM}
  370.     INLINE $205F, $4E90;
  371.     {$ENDC}
  372.  
  373. PROCEDURE CallICMCompletionProc(result: OSErr; flags: INTEGER; refcon: LONGINT; userRoutine: ICMCompletionUPP);
  374.     {$IFC NOT GENERATINGCFM}
  375.     INLINE $205F, $4E90;
  376.     {$ENDC}
  377.  
  378. FUNCTION CallICMProgressProc(message: INTEGER; completeness: Fixed; refcon: LONGINT; userRoutine: ICMProgressUPP): OSErr;
  379.     {$IFC NOT GENERATINGCFM}
  380.     INLINE $205F, $4E90;
  381.     {$ENDC}
  382.  
  383. PROCEDURE CallStdPixProc(VAR src: PixMap; VAR srcRect: Rect; VAR matrix: MatrixRecord; mode: INTEGER; mask: RgnHandle; VAR matte: PixMap; VAR matteRect: Rect; flags: INTEGER; userRoutine: StdPixUPP);
  384.     {$IFC NOT GENERATINGCFM}
  385.     INLINE $205F, $4E90;
  386.     {$ENDC}
  387.  
  388. PROCEDURE CallICMAlignmentProc(VAR rp: Rect; refcon: LONGINT; userRoutine: ICMAlignmentUPP);
  389.     {$IFC NOT GENERATINGCFM}
  390.     INLINE $205F, $4E90;
  391.     {$ENDC}
  392.  
  393. FUNCTION CodecManagerVersion(VAR version: LONGINT): OSErr;
  394.     {$IFC NOT GENERATINGCFM}
  395.     INLINE $7000, $AAA3;
  396.     {$ENDC}
  397. FUNCTION GetCodecNameList(VAR list: CodecNameSpecListPtr; showAll: INTEGER): OSErr;
  398.     {$IFC NOT GENERATINGCFM}
  399.     INLINE $7001, $AAA3;
  400.     {$ENDC}
  401. FUNCTION DisposeCodecNameList(list: CodecNameSpecListPtr): OSErr;
  402.     {$IFC NOT GENERATINGCFM}
  403.     INLINE $700F, $AAA3;
  404.     {$ENDC}
  405. FUNCTION GetCodecInfo(VAR info: CodecInfo; cType: CodecType; codec: CodecComponent): OSErr;
  406.     {$IFC NOT GENERATINGCFM}
  407.     INLINE $7003, $AAA3;
  408.     {$ENDC}
  409. FUNCTION GetMaxCompressionSize(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; quality: CodecQ; cType: CodecType; codec: CompressorComponent; VAR size: LONGINT): OSErr;
  410.     {$IFC NOT GENERATINGCFM}
  411.     INLINE $7004, $AAA3;
  412.     {$ENDC}
  413. FUNCTION GetCompressionTime(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; cType: CodecType; codec: CompressorComponent; VAR spatialQuality: CodecQ; VAR temporalQuality: CodecQ; VAR compressTime: LONGINT): OSErr;
  414.     {$IFC NOT GENERATINGCFM}
  415.     INLINE $7005, $AAA3;
  416.     {$ENDC}
  417. FUNCTION CompressImage(src: PixMapHandle; {CONST}VAR srcRect: Rect; quality: CodecQ; cType: CodecType; desc: ImageDescriptionHandle; data: Ptr): OSErr;
  418.     {$IFC NOT GENERATINGCFM}
  419.     INLINE $7006, $AAA3;
  420.     {$ENDC}
  421. FUNCTION FCompressImage(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; quality: CodecQ; cType: CodecType; codec: CompressorComponent; clut: CTabHandle; flags: CodecFlags; bufferSize: LONGINT; flushProc: ICMFlushProcRecordPtr; progressProc: ICMProgressProcRecordPtr; desc: ImageDescriptionHandle; data: Ptr): OSErr;
  422.     {$IFC NOT GENERATINGCFM}
  423.     INLINE $7007, $AAA3;
  424.     {$ENDC}
  425. FUNCTION DecompressImage(data: Ptr; desc: ImageDescriptionHandle; dst: PixMapHandle; {CONST}VAR srcRect: Rect; {CONST}VAR dstRect: Rect; mode: INTEGER; mask: RgnHandle): OSErr;
  426.     {$IFC NOT GENERATINGCFM}
  427.     INLINE $7008, $AAA3;
  428.     {$ENDC}
  429. FUNCTION FDecompressImage(data: Ptr; desc: ImageDescriptionHandle; dst: PixMapHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; matte: PixMapHandle; {CONST}VAR matteRect: Rect; accuracy: CodecQ; codec: DecompressorComponent; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; progressProc: ICMProgressProcRecordPtr): OSErr;
  430.     {$IFC NOT GENERATINGCFM}
  431.     INLINE $7009, $AAA3;
  432.     {$ENDC}
  433. FUNCTION CompressSequenceBegin(VAR seqID: ImageSequence; src: PixMapHandle; prev: PixMapHandle; {CONST}VAR srcRect: Rect; {CONST}VAR prevRect: Rect; colorDepth: INTEGER; cType: CodecType; codec: CompressorComponent; spatialQuality: CodecQ; temporalQuality: CodecQ; keyFrameRate: LONGINT; clut: CTabHandle; flags: CodecFlags; desc: ImageDescriptionHandle): OSErr;
  434.     {$IFC NOT GENERATINGCFM}
  435.     INLINE $700A, $AAA3;
  436.     {$ENDC}
  437. FUNCTION CompressSequenceFrame(seqID: ImageSequence; src: PixMapHandle; {CONST}VAR srcRect: Rect; flags: CodecFlags; data: Ptr; VAR dataSize: LONGINT; VAR similarity: UInt8; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  438.     {$IFC NOT GENERATINGCFM}
  439.     INLINE $700B, $AAA3;
  440.     {$ENDC}
  441. FUNCTION DecompressSequenceBegin(VAR seqID: ImageSequence; desc: ImageDescriptionHandle; port: CGrafPtr; gdh: GDHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; flags: CodecFlags; accuracy: CodecQ; codec: DecompressorComponent): OSErr;
  442.     {$IFC NOT GENERATINGCFM}
  443.     INLINE $700D, $AAA3;
  444.     {$ENDC}
  445. FUNCTION DecompressSequenceBeginS(VAR seqID: ImageSequence; desc: ImageDescriptionHandle; data: Ptr; dataSize: LONGINT; port: CGrafPtr; gdh: GDHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; flags: CodecFlags; accuracy: CodecQ; codec: DecompressorComponent): OSErr;
  446.     {$IFC NOT GENERATINGCFM}
  447.     INLINE $203C, $30, $5D, $AAA3;
  448.     {$ENDC}
  449. FUNCTION DecompressSequenceFrame(seqID: ImageSequence; data: Ptr; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  450.     {$IFC NOT GENERATINGCFM}
  451.     INLINE $700E, $AAA3;
  452.     {$ENDC}
  453. FUNCTION DecompressSequenceFrameS(seqID: ImageSequence; data: Ptr; dataSize: LONGINT; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  454.     {$IFC NOT GENERATINGCFM}
  455.     INLINE $203C, $16, $47, $AAA3;
  456.     {$ENDC}
  457. FUNCTION DecompressSequenceFrameWhen(seqID: ImageSequence; data: Ptr; dataSize: LONGINT; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr; {CONST}VAR frameTime: ICMFrameTimeRecord): OSErr;
  458.     {$IFC NOT GENERATINGCFM}
  459.     INLINE $203C, $1A, $5E, $AAA3;
  460.     {$ENDC}
  461. FUNCTION CDSequenceFlush(seqID: ImageSequence): OSErr;
  462.     {$IFC NOT GENERATINGCFM}
  463.     INLINE $203C, $4, $5F, $AAA3;
  464.     {$ENDC}
  465. FUNCTION SetDSequenceMatrix(seqID: ImageSequence; matrix: MatrixRecordPtr): OSErr;
  466.     {$IFC NOT GENERATINGCFM}
  467.     INLINE $7010, $AAA3;
  468.     {$ENDC}
  469. FUNCTION SetDSequenceMatte(seqID: ImageSequence; matte: PixMapHandle; {CONST}VAR matteRect: Rect): OSErr;
  470.     {$IFC NOT GENERATINGCFM}
  471.     INLINE $7011, $AAA3;
  472.     {$ENDC}
  473. FUNCTION SetDSequenceMask(seqID: ImageSequence; mask: RgnHandle): OSErr;
  474.     {$IFC NOT GENERATINGCFM}
  475.     INLINE $7012, $AAA3;
  476.     {$ENDC}
  477. FUNCTION SetDSequenceTransferMode(seqID: ImageSequence; mode: INTEGER; {CONST}VAR opColor: RGBColor): OSErr;
  478.     {$IFC NOT GENERATINGCFM}
  479.     INLINE $7013, $AAA3;
  480.     {$ENDC}
  481. FUNCTION SetDSequenceDataProc(seqID: ImageSequence; dataProc: ICMDataProcRecordPtr; bufferSize: LONGINT): OSErr;
  482.     {$IFC NOT GENERATINGCFM}
  483.     INLINE $7014, $AAA3;
  484.     {$ENDC}
  485. FUNCTION SetDSequenceAccuracy(seqID: ImageSequence; accuracy: CodecQ): OSErr;
  486.     {$IFC NOT GENERATINGCFM}
  487.     INLINE $7034, $AAA3;
  488.     {$ENDC}
  489. FUNCTION SetDSequenceSrcRect(seqID: ImageSequence; {CONST}VAR srcRect: Rect): OSErr;
  490.     {$IFC NOT GENERATINGCFM}
  491.     INLINE $7035, $AAA3;
  492.     {$ENDC}
  493. FUNCTION GetDSequenceImageBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  494.     {$IFC NOT GENERATINGCFM}
  495.     INLINE $7015, $AAA3;
  496.     {$ENDC}
  497. FUNCTION GetDSequenceScreenBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  498.     {$IFC NOT GENERATINGCFM}
  499.     INLINE $7016, $AAA3;
  500.     {$ENDC}
  501. FUNCTION SetCSequenceQuality(seqID: ImageSequence; spatialQuality: CodecQ; temporalQuality: CodecQ): OSErr;
  502.     {$IFC NOT GENERATINGCFM}
  503.     INLINE $7017, $AAA3;
  504.     {$ENDC}
  505. FUNCTION SetCSequencePrev(seqID: ImageSequence; prev: PixMapHandle; {CONST}VAR prevRect: Rect): OSErr;
  506.     {$IFC NOT GENERATINGCFM}
  507.     INLINE $7018, $AAA3;
  508.     {$ENDC}
  509. FUNCTION SetCSequenceFlushProc(seqID: ImageSequence; flushProc: ICMFlushProcRecordPtr; bufferSize: LONGINT): OSErr;
  510.     {$IFC NOT GENERATINGCFM}
  511.     INLINE $7033, $AAA3;
  512.     {$ENDC}
  513. FUNCTION SetCSequenceKeyFrameRate(seqID: ImageSequence; keyframerate: LONGINT): OSErr;
  514.     {$IFC NOT GENERATINGCFM}
  515.     INLINE $7036, $AAA3;
  516.     {$ENDC}
  517. FUNCTION GetCSequenceKeyFrameRate(seqID: ImageSequence; VAR keyframerate: LONGINT): OSErr;
  518.     {$IFC NOT GENERATINGCFM}
  519.     INLINE $203C, $8, $4B, $AAA3;
  520.     {$ENDC}
  521. FUNCTION GetCSequencePrevBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  522.     {$IFC NOT GENERATINGCFM}
  523.     INLINE $7019, $AAA3;
  524.     {$ENDC}
  525. FUNCTION CDSequenceBusy(seqID: ImageSequence): OSErr;
  526.     {$IFC NOT GENERATINGCFM}
  527.     INLINE $701A, $AAA3;
  528.     {$ENDC}
  529. FUNCTION CDSequenceEnd(seqID: ImageSequence): OSErr;
  530.     {$IFC NOT GENERATINGCFM}
  531.     INLINE $701B, $AAA3;
  532.     {$ENDC}
  533. FUNCTION GetCompressedImageSize(desc: ImageDescriptionHandle; data: Ptr; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; VAR dataSize: LONGINT): OSErr;
  534.     {$IFC NOT GENERATINGCFM}
  535.     INLINE $701C, $AAA3;
  536.     {$ENDC}
  537. FUNCTION GetSimilarity(src: PixMapHandle; {CONST}VAR srcRect: Rect; desc: ImageDescriptionHandle; data: Ptr; VAR similarity: Fixed): OSErr;
  538.     {$IFC NOT GENERATINGCFM}
  539.     INLINE $701D, $AAA3;
  540.     {$ENDC}
  541. FUNCTION GetImageDescriptionCTable(desc: ImageDescriptionHandle; VAR ctable: CTabHandle): OSErr;
  542.     {$IFC NOT GENERATINGCFM}
  543.     INLINE $701E, $AAA3;
  544.     {$ENDC}
  545. FUNCTION SetImageDescriptionCTable(desc: ImageDescriptionHandle; ctable: CTabHandle): OSErr;
  546.     {$IFC NOT GENERATINGCFM}
  547.     INLINE $701F, $AAA3;
  548.     {$ENDC}
  549. FUNCTION GetImageDescriptionExtension(desc: ImageDescriptionHandle; VAR extension: Handle; idType: LONGINT; index: LONGINT): OSErr;
  550.     {$IFC NOT GENERATINGCFM}
  551.     INLINE $7020, $AAA3;
  552.     {$ENDC}
  553. FUNCTION SetImageDescriptionExtension(desc: ImageDescriptionHandle; extension: Handle; idType: LONGINT): OSErr;
  554.     {$IFC NOT GENERATINGCFM}
  555.     INLINE $7021, $AAA3;
  556.     {$ENDC}
  557. FUNCTION RemoveImageDescriptionExtension(VAR desc: ImageDescription; idType: LONGINT; index: LONGINT): OSErr;
  558.     {$IFC NOT GENERATINGCFM}
  559.     INLINE $203C, $C, $3A, $AAA3;
  560.     {$ENDC}
  561. FUNCTION CountImageDescriptionExtensionType(VAR desc: ImageDescription; idType: LONGINT; VAR count: LONGINT): OSErr;
  562.     {$IFC NOT GENERATINGCFM}
  563.     INLINE $203C, $C, $3B, $AAA3;
  564.     {$ENDC}
  565. FUNCTION GetNextImageDescriptionExtensionType(VAR desc: ImageDescription; VAR idType: LONGINT): OSErr;
  566.     {$IFC NOT GENERATINGCFM}
  567.     INLINE $203C, $8, $3C, $AAA3;
  568.     {$ENDC}
  569. FUNCTION FindCodec(cType: CodecType; specCodec: CodecComponent; VAR compressor: CompressorComponent; VAR decompressor: DecompressorComponent): OSErr;
  570.     {$IFC NOT GENERATINGCFM}
  571.     INLINE $7023, $AAA3;
  572.     {$ENDC}
  573. FUNCTION CompressPicture(srcPicture: PicHandle; dstPicture: PicHandle; quality: CodecQ; cType: CodecType): OSErr;
  574.     {$IFC NOT GENERATINGCFM}
  575.     INLINE $7024, $AAA3;
  576.     {$ENDC}
  577. FUNCTION FCompressPicture(srcPicture: PicHandle; dstPicture: PicHandle; colorDepth: INTEGER; clut: CTabHandle; quality: CodecQ; doDither: INTEGER; compressAgain: INTEGER; progressProc: ICMProgressProcRecordPtr; cType: CodecType; codec: CompressorComponent): OSErr;
  578.     {$IFC NOT GENERATINGCFM}
  579.     INLINE $7025, $AAA3;
  580.     {$ENDC}
  581. FUNCTION CompressPictureFile(srcRefNum: INTEGER; dstRefNum: INTEGER; quality: CodecQ; cType: CodecType): OSErr;
  582.     {$IFC NOT GENERATINGCFM}
  583.     INLINE $7026, $AAA3;
  584.     {$ENDC}
  585. FUNCTION FCompressPictureFile(srcRefNum: INTEGER; dstRefNum: INTEGER; colorDepth: INTEGER; clut: CTabHandle; quality: CodecQ; doDither: INTEGER; compressAgain: INTEGER; progressProc: ICMProgressProcRecordPtr; cType: CodecType; codec: CompressorComponent): OSErr;
  586.     {$IFC NOT GENERATINGCFM}
  587.     INLINE $7027, $AAA3;
  588.     {$ENDC}
  589. FUNCTION GetPictureFileHeader(refNum: INTEGER; VAR frame: Rect; VAR header: OpenCPicParams): OSErr;
  590.     {$IFC NOT GENERATINGCFM}
  591.     INLINE $7028, $AAA3;
  592.     {$ENDC}
  593. FUNCTION DrawPictureFile(refNum: INTEGER; {CONST}VAR frame: Rect; progressProc: ICMProgressProcRecordPtr): OSErr;
  594.     {$IFC NOT GENERATINGCFM}
  595.     INLINE $7029, $AAA3;
  596.     {$ENDC}
  597. FUNCTION DrawTrimmedPicture(srcPicture: PicHandle; {CONST}VAR frame: Rect; trimMask: RgnHandle; doDither: INTEGER; progressProc: ICMProgressProcRecordPtr): OSErr;
  598.     {$IFC NOT GENERATINGCFM}
  599.     INLINE $702E, $AAA3;
  600.     {$ENDC}
  601. FUNCTION DrawTrimmedPictureFile(srcRefnum: INTEGER; {CONST}VAR frame: Rect; trimMask: RgnHandle; doDither: INTEGER; progressProc: ICMProgressProcRecordPtr): OSErr;
  602.     {$IFC NOT GENERATINGCFM}
  603.     INLINE $702F, $AAA3;
  604.     {$ENDC}
  605. FUNCTION MakeThumbnailFromPicture(picture: PicHandle; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  606.     {$IFC NOT GENERATINGCFM}
  607.     INLINE $702A, $AAA3;
  608.     {$ENDC}
  609. FUNCTION MakeThumbnailFromPictureFile(refNum: INTEGER; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  610.     {$IFC NOT GENERATINGCFM}
  611.     INLINE $702B, $AAA3;
  612.     {$ENDC}
  613. FUNCTION MakeThumbnailFromPixMap(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  614.     {$IFC NOT GENERATINGCFM}
  615.     INLINE $702C, $AAA3;
  616.     {$ENDC}
  617. FUNCTION TrimImage(desc: ImageDescriptionHandle; inData: Ptr; inBufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; outData: Ptr; outBufferSize: LONGINT; flushProc: ICMFlushProcRecordPtr; VAR trimRect: Rect; progressProc: ICMProgressProcRecordPtr): OSErr;
  618.     {$IFC NOT GENERATINGCFM}
  619.     INLINE $702D, $AAA3;
  620.     {$ENDC}
  621. FUNCTION ConvertImage(srcDD: ImageDescriptionHandle; srcData: Ptr; colorDepth: INTEGER; clut: CTabHandle; accuracy: CodecQ; quality: CodecQ; cType: CodecType; codec: CodecComponent; dstDD: ImageDescriptionHandle; dstData: Ptr): OSErr;
  622.     {$IFC NOT GENERATINGCFM}
  623.     INLINE $7030, $AAA3;
  624.     {$ENDC}
  625. FUNCTION GetCompressedPixMapInfo(pix: PixMapPtr; VAR desc: ImageDescriptionHandle; VAR data: Ptr; VAR bufferSize: LONGINT; VAR dataProc: ICMDataProcRecord; VAR progressProc: ICMProgressProcRecord): OSErr;
  626.     {$IFC NOT GENERATINGCFM}
  627.     INLINE $7037, $AAA3;
  628.     {$ENDC}
  629. FUNCTION SetCompressedPixMapInfo(pix: PixMapPtr; desc: ImageDescriptionHandle; data: Ptr; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; progressProc: ICMProgressProcRecordPtr): OSErr;
  630.     {$IFC NOT GENERATINGCFM}
  631.     INLINE $7038, $AAA3;
  632.     {$ENDC}
  633. PROCEDURE StdPix(src: PixMapPtr; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; matte: PixMapPtr; {CONST}VAR matteRect: Rect; flags: INTEGER);
  634.     {$IFC NOT GENERATINGCFM}
  635.     INLINE $700C, $AAA3;
  636.     {$ENDC}
  637. FUNCTION TransformRgn(matrix: MatrixRecordPtr; rgn: RgnHandle): OSErr;
  638.     {$IFC NOT GENERATINGCFM}
  639.     INLINE $7039, $AAA3;
  640.     {$ENDC}
  641. {**********
  642.     preview stuff
  643. **********}
  644. PROCEDURE SFGetFilePreview(where: Point; prompt: ConstStr255Param; fileFilter: FileFilterUPP; numTypes: INTEGER; VAR typeList: SFTypeList; dlgHook: DlgHookUPP; VAR reply: SFReply);
  645.     {$IFC NOT GENERATINGCFM}
  646.     INLINE $7041, $AAA3;
  647.     {$ENDC}
  648. PROCEDURE SFPGetFilePreview(where: Point; prompt: ConstStr255Param; fileFilter: FileFilterUPP; numTypes: INTEGER; VAR typeList: SFTypeList; dlgHook: DlgHookUPP; VAR reply: SFReply; dlgID: INTEGER; filterProc: ModalFilterUPP);
  649.     {$IFC NOT GENERATINGCFM}
  650.     INLINE $7042, $AAA3;
  651.     {$ENDC}
  652. PROCEDURE StandardGetFilePreview(fileFilter: FileFilterUPP; numTypes: INTEGER; VAR typeList: SFTypeList; VAR reply: StandardFileReply);
  653.     {$IFC NOT GENERATINGCFM}
  654.     INLINE $7043, $AAA3;
  655.     {$ENDC}
  656. PROCEDURE CustomGetFilePreview(fileFilter: FileFilterYDUPP; numTypes: INTEGER; VAR typeList: SFTypeList; VAR reply: StandardFileReply; dlgID: INTEGER; where: Point; dlgHook: DlgHookYDUPP; filterProc: ModalFilterYDUPP; {CONST}VAR activeList: INTEGER; activateProc: ActivateYDUPP; yourDataPtr: UNIV Ptr);
  657.     {$IFC NOT GENERATINGCFM}
  658.     INLINE $7044, $AAA3;
  659.     {$ENDC}
  660. FUNCTION MakeFilePreview(resRefNum: INTEGER; progress: ICMProgressProcRecordPtr): OSErr;
  661.     {$IFC NOT GENERATINGCFM}
  662.     INLINE $7045, $AAA3;
  663.     {$ENDC}
  664. FUNCTION AddFilePreview(resRefNum: INTEGER; previewType: OSType; previewData: Handle): OSErr;
  665.     {$IFC NOT GENERATINGCFM}
  666.     INLINE $7046, $AAA3;
  667.     {$ENDC}
  668.  
  669. CONST
  670.     sfpItemPreviewAreaUser        = 11;
  671.     sfpItemPreviewStaticText    = 12;
  672.     sfpItemPreviewDividerUser    = 13;
  673.     sfpItemCreatePreviewButton    = 14;
  674.     sfpItemShowPreviewButton    = 15;
  675.  
  676.  
  677. TYPE
  678.     PreviewResourceRecord = RECORD
  679.         modDate:                LONGINT;
  680.         version:                INTEGER;
  681.         resType:                OSType;
  682.         resID:                    INTEGER;
  683.     END;
  684.     PreviewResourcePtr = ^PreviewResourceRecord;
  685.     PreviewResource = ^PreviewResourcePtr;
  686.  
  687.  
  688. PROCEDURE AlignScreenRect(VAR rp: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  689.     {$IFC NOT GENERATINGCFM}
  690.     INLINE $203C, $8, $4C, $AAA3;
  691.     {$ENDC}
  692. PROCEDURE AlignWindow(wp: WindowPtr; front: BOOLEAN; {CONST}VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  693.     {$IFC NOT GENERATINGCFM}
  694.     INLINE $203C, $E, $4D, $AAA3;
  695.     {$ENDC}
  696. PROCEDURE DragAlignedWindow(wp: WindowPtr; startPt: Point; VAR boundsRect: Rect; VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  697.     {$IFC NOT GENERATINGCFM}
  698.     INLINE $203C, $14, $4E, $AAA3;
  699.     {$ENDC}
  700. FUNCTION DragAlignedGrayRgn(theRgn: RgnHandle; startPt: Point; VAR boundsRect: Rect; VAR slopRect: Rect; axis: INTEGER; actionProc: UniversalProcPtr; VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr): LONGINT;
  701.     {$IFC NOT GENERATINGCFM}
  702.     INLINE $203C, $1E, $4F, $AAA3;
  703.     {$ENDC}
  704. FUNCTION SetCSequenceDataRateParams(seqID: ImageSequence; params: DataRateParamsPtr): OSErr;
  705.     {$IFC NOT GENERATINGCFM}
  706.     INLINE $203C, $8, $50, $AAA3;
  707.     {$ENDC}
  708. FUNCTION SetCSequenceFrameNumber(seqID: ImageSequence; frameNumber: LONGINT): OSErr;
  709.     {$IFC NOT GENERATINGCFM}
  710.     INLINE $203C, $8, $51, $AAA3;
  711.     {$ENDC}
  712. FUNCTION NewImageGWorld(VAR gworld: GWorldPtr; idh: ImageDescriptionHandle; flags: GWorldFlags): QDErr;
  713.     {$IFC NOT GENERATINGCFM}
  714.     INLINE $203C, $C, $52, $AAA3;
  715.     {$ENDC}
  716. FUNCTION GetCSequenceDataRateParams(seqID: ImageSequence; params: DataRateParamsPtr): OSErr;
  717.     {$IFC NOT GENERATINGCFM}
  718.     INLINE $203C, $8, $53, $AAA3;
  719.     {$ENDC}
  720. FUNCTION GetCSequenceFrameNumber(seqID: ImageSequence; VAR frameNumber: LONGINT): OSErr;
  721.     {$IFC NOT GENERATINGCFM}
  722.     INLINE $203C, $8, $54, $AAA3;
  723.     {$ENDC}
  724. FUNCTION GetBestDeviceRect(VAR gdh: GDHandle; VAR rp: Rect): OSErr;
  725.     {$IFC NOT GENERATINGCFM}
  726.     INLINE $203C, $8, $55, $AAA3;
  727.     {$ENDC}
  728. FUNCTION SetSequenceProgressProc(seqID: ImageSequence; VAR progressProc: ICMProgressProcRecord): OSErr;
  729.     {$IFC NOT GENERATINGCFM}
  730.     INLINE $203C, $8, $56, $AAA3;
  731.     {$ENDC}
  732. FUNCTION GDHasScale(gdh: GDHandle; depth: INTEGER; VAR scale: Fixed): OSErr;
  733.     {$IFC NOT GENERATINGCFM}
  734.     INLINE $203C, $A, $5A, $AAA3;
  735.     {$ENDC}
  736. FUNCTION GDGetScale(gdh: GDHandle; VAR scale: Fixed; VAR flags: INTEGER): OSErr;
  737.     {$IFC NOT GENERATINGCFM}
  738.     INLINE $203C, $C, $5B, $AAA3;
  739.     {$ENDC}
  740. FUNCTION GDSetScale(gdh: GDHandle; scale: Fixed; flags: INTEGER): OSErr;
  741.     {$IFC NOT GENERATINGCFM}
  742.     INLINE $203C, $A, $5C, $AAA3;
  743.     {$ENDC}
  744. FUNCTION ICMShieldSequenceCursor(seqID: ImageSequence): OSErr;
  745.     {$IFC NOT GENERATINGCFM}
  746.     INLINE $203C, $4, $62, $AAA3;
  747.     {$ENDC}
  748. PROCEDURE ICMDecompressComplete(seqID: ImageSequence; err: OSErr; flag: INTEGER; completionRtn: ICMCompletionProcRecordPtr);
  749.     {$IFC NOT GENERATINGCFM}
  750.     INLINE $203C, $C, $63, $AAA3;
  751.     {$ENDC}
  752. FUNCTION SetDSequenceTimeCode(seqID: ImageSequence; timeCodeFormat: UNIV Ptr; timeCodeTime: UNIV Ptr): OSErr;
  753.     {$IFC NOT GENERATINGCFM}
  754.     INLINE $203C, $C, $64, $AAA3;
  755.     {$ENDC}
  756.  
  757. CONST
  758.     identityMatrixType            = $00;                            { result if matrix is identity }
  759.     translateMatrixType            = $01;                            { result if matrix translates }
  760.     scaleMatrixType                = $02;                            { result if matrix scales }
  761.     scaleTranslateMatrixType    = $03;                            { result if matrix scales and translates }
  762.     linearMatrixType            = $04;                            { result if matrix is general 2 x 2 }
  763.     linearTranslateMatrixType    = $05;                            { result if matrix is general 2 x 2 and translates }
  764.     perspectiveMatrixType        = $06;                            { result if matrix is general 3 x 3 }
  765.  
  766.     
  767. TYPE
  768.     MatrixFlags = INTEGER;
  769.  
  770.  
  771. FUNCTION GetMatrixType({CONST}VAR m: MatrixRecord): INTEGER;
  772.     {$IFC NOT GENERATINGCFM}
  773.     INLINE $7014, $ABC2;
  774.     {$ENDC}
  775. PROCEDURE CopyMatrix({CONST}VAR m1: MatrixRecord; VAR m2: MatrixRecord);
  776.     {$IFC NOT GENERATINGCFM}
  777.     INLINE $7020, $ABC2;
  778.     {$ENDC}
  779. FUNCTION EqualMatrix({CONST}VAR m1: MatrixRecord; {CONST}VAR m2: MatrixRecord): BOOLEAN;
  780.     {$IFC NOT GENERATINGCFM}
  781.     INLINE $7021, $ABC2;
  782.     {$ENDC}
  783. PROCEDURE SetIdentityMatrix(VAR matrix: MatrixRecord);
  784.     {$IFC NOT GENERATINGCFM}
  785.     INLINE $7015, $ABC2;
  786.     {$ENDC}
  787. PROCEDURE TranslateMatrix(VAR m: MatrixRecord; deltaH: Fixed; deltaV: Fixed);
  788.     {$IFC NOT GENERATINGCFM}
  789.     INLINE $7019, $ABC2;
  790.     {$ENDC}
  791. PROCEDURE RotateMatrix(VAR m: MatrixRecord; degrees: Fixed; aboutX: Fixed; aboutY: Fixed);
  792.     {$IFC NOT GENERATINGCFM}
  793.     INLINE $7016, $ABC2;
  794.     {$ENDC}
  795. PROCEDURE ScaleMatrix(VAR m: MatrixRecord; scaleX: Fixed; scaleY: Fixed; aboutX: Fixed; aboutY: Fixed);
  796.     {$IFC NOT GENERATINGCFM}
  797.     INLINE $7017, $ABC2;
  798.     {$ENDC}
  799. PROCEDURE SkewMatrix(VAR m: MatrixRecord; skewX: Fixed; skewY: Fixed; aboutX: Fixed; aboutY: Fixed);
  800.     {$IFC NOT GENERATINGCFM}
  801.     INLINE $7018, $ABC2;
  802.     {$ENDC}
  803. FUNCTION TransformFixedPoints({CONST}VAR m: MatrixRecord; VAR fpt: FixedPoint; count: LONGINT): OSErr;
  804.     {$IFC NOT GENERATINGCFM}
  805.     INLINE $7022, $ABC2;
  806.     {$ENDC}
  807. FUNCTION TransformPoints({CONST}VAR mp: MatrixRecord; VAR pt1: Point; count: LONGINT): OSErr;
  808.     {$IFC NOT GENERATINGCFM}
  809.     INLINE $7023, $ABC2;
  810.     {$ENDC}
  811. FUNCTION TransformFixedRect({CONST}VAR m: MatrixRecord; VAR fr: FixedRect; VAR fpp: FixedPoint): BOOLEAN;
  812.     {$IFC NOT GENERATINGCFM}
  813.     INLINE $7024, $ABC2;
  814.     {$ENDC}
  815. FUNCTION TransformRect({CONST}VAR m: MatrixRecord; VAR r: Rect; VAR fpp: FixedPoint): BOOLEAN;
  816.     {$IFC NOT GENERATINGCFM}
  817.     INLINE $7025, $ABC2;
  818.     {$ENDC}
  819. FUNCTION InverseMatrix({CONST}VAR m: MatrixRecord; VAR im: MatrixRecord): BOOLEAN;
  820.     {$IFC NOT GENERATINGCFM}
  821.     INLINE $701C, $ABC2;
  822.     {$ENDC}
  823. PROCEDURE ConcatMatrix({CONST}VAR a: MatrixRecord; VAR b: MatrixRecord);
  824.     {$IFC NOT GENERATINGCFM}
  825.     INLINE $701B, $ABC2;
  826.     {$ENDC}
  827. PROCEDURE RectMatrix(VAR matrix: MatrixRecord; {CONST}VAR srcRect: Rect; {CONST}VAR dstRect: Rect);
  828.     {$IFC NOT GENERATINGCFM}
  829.     INLINE $701E, $ABC2;
  830.     {$ENDC}
  831. PROCEDURE MapMatrix(VAR matrix: MatrixRecord; {CONST}VAR fromRect: Rect; {CONST}VAR toRect: Rect);
  832.     {$IFC NOT GENERATINGCFM}
  833.     INLINE $701D, $ABC2;
  834.     {$ENDC}
  835.  
  836. {$ALIGN RESET}
  837. {$POP}
  838.  
  839. {$SETC UsingIncludes := ImageCompressionIncludes}
  840.  
  841. {$ENDC} {__IMAGECOMPRESSION__}
  842.  
  843. {$IFC NOT UsingIncludes}
  844.  END.
  845. {$ENDC}
  846.